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J0VIAL-X.2, The Language of the 

One Pass JOVIAL Compiler 

J-X.2 has been obtained by choosing a subset from the intersection of the J2 
and J3 languages. In the main, the subset has been formed by deleting from 
the intersection, features which would slow the compilation process and/or 
were not vital in such programming areas as compiler writing. Since in many 
respects J2 is a subset of J3> J-X.2 is much closer to J2. 

The authors of the compiler have tried to the best of their understanding to 
make J-X-2 a subset of J? and J3„ At the present time they know of only 
one exception. This exception is due to an incompatability between J2 and 

J3 and will be noted later, 

The features that have been deleted are in general: 

1. Fixed point computation . All computation is done by integer or floating 
point arithmetic. This is perhaps the most critical deletion. Instead 
of a fixed item description, use the integer form, i.e., 

ITEM XX I 36 U $ 

2. All functional modifiers . BIT, BYTE, CHAR, MAHT, ODD, ALL, POS, ENTRY, 
DENT, NWDSEN. 

3. Input /Output . All input /output must be done via procedures as in J2 (7090). 

k. Unspecified table declarations . All tables must be bit-specified. All 
tables are parallel, regardless of the specification in the declaration, 
e.g.: 

TABLE DRQ V 25 P 2 $ 

BEGIN DRQ& I 3 U 18 M 

DRQB I 15 U 3 M 

DRQC I 15 U 1 3 M 

DRQD I 15 U 21 M 

DRQE I 8 U 1 21 D $ 

DRQF I T U 1 29 D $ 
END 

5. Status, dual and Boolean variables and constants . 

6. Literal variables and constants, greater than one word in length, e.g . : 

ITEM NAME H 84 P 16h(THIS IS TOO LONG) $ 
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7. MODE, STRING, FILE, DEFINE and OVERLAY declarations . The normal mode 
is integer, signed. 

8. labels may not exceed 6 characters nor contain a prime ( ' ) . 

9. Transmission code literals . 

10. CLOSE statements . 

11. Entry variables . 

12. Item switches . 

13. Switches or CLOSE'S as svitch branch points, or empty switch positions, 
e.g.; 

SWITCH TRAIN = (Sl„ S2„ SW($I$) )$ 
This is not a legal J-X.2 switch because SW ($1$) appears as a branch 
point and it contains empty positions. 

Ik. Exchange statements . 

A more detailed description of the J-X.2 language is provided in the attached 
chart which compares J3, J2 and J-X.2 by examining each form of TM-555/002/Ol. 
This comparison describes J2 and J-X.2 as subsets of J3- Where J2 and J-X.2 
are the same as J3 for a given form, the comment "Same" will be in the appro- 
priate columns. Where J2 differs from J3 and J-X.2 is the same as J2, the 
comment "Same as J2" will appear. In case of differences, a brief comment will 
appear which will only outline the differences . For a more detailed explan- 
ation of these points see TM-555/002/01 for J3, FN-6223/lOO/OO for J2 and 
TM-97O/OO5/OO for J-X.2 (the latter is being prepared). 

The exception that prevents J-X.2 from being an exact subset, previously 
refered to, is the use of table names. J-X.2 allows the use of an unsubscripted 
table name to represent the location of the table — as in J2. This is of course 
illegal in J3. J-X.2 also allows the use of a table name as a formal parameter 
which is illegal in J2. (See form ^0 and 116 in the following chart.) 



J-3 TM-555/002/01 


J-2 (7090) FN^-6223/100 


J0VIAL-X.2 


Form 


Description 






1 


Letter 


Same 


Same 


2 


Numeral 


Same 


Same 


3 


Mark 


No * 


NO ' 


k 


Sign 


Same 


Sfune 


5 


Arithmetic Operator 


** for exponentiation 
ABS for absolute value 


Same as J2 


6 


Relational Operator 


Same 


Same 


7 


Logical Operator 


Same 


Same 


8 


Sequential Operator 


No IFEITH or ORIF 


No IFEITH, ORIF, or CLOSE 


9 


File Operator 


None 


None 


10 


Functional Modifier 


No CHAR, MANT, ODD, POS, 
ENT instead of ENTRY 


None except; A (used with 
ASSIGN ) 


11 


Separator 


No ' or ... 


Np == or ' or ... 


12 


Bracket 


ABS instead of (/ /) 


Same as J2 


13 


Declarator 


No MODE, FILE, DEFINE or 
OVERLAY 


No MOD, STRING, FILE, DE- 
FINE, or OVERLAY 


lit 


Abbreviat ions 


No B 


Nb A, B, D, L, T or V 


15 


Label 


6 characters, no * 


Same as J2 


16 


itemname 


No bname, dname 


Same as J2 


IT 


fname 


Same 


Same 


18 


aname 


Same 


Integer only 


19 


dname 


None 


None 


20 


Iname 


Same 


Same 


21 


sname 


Same jf 


None 
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I 
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J&sl 
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PescriptiQn 



J-2 (7090) FN-^-6223/lOO 



JOVIAL-X.P 



IjO 






On 



23 
24 

23 
26 

27 
28 

29 
30 
31 
32 
33 

3h 

35 



36 

37 
36 

39 



bname 

tablename 

filename 

statementname 

switchname 

procedurename 

Constant 

n 

icon 

fcon 

aeon 

ocon 

dcon 
Icon 



bcon 
status 
comment 
variable 



None 

Same 

None 

Same 

Same 

Same 

No dcon, bcon 

Same 

Same 

Same 

No negative precision 

Same 

None 

Six characters or less 



None 

Six character labels or less 

Same 

No bvar 



None 

Same 

None 

Same 

Same 

Same 

No aeon, dcon, bcon 

Same 

Same 



Same, must start with digit; 
None i ' e -/°-iE4not .11* 



n (six or less) must pre- 
cede Oj, i.e., -'+0(12210 

None 

Six characters or less. No 
T. The number of character^ 
in the constant must be 
equal to the number of char 
acters in the item, e.g., 
ITEM XX H 5 P 5H( ABC) $ 

NOT 
ITEM XX H 5 P 3H(ABC) $ 

None 

None 

Same 

No svar,bvar, entvar 
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J-2 (7090) FN-^-6223/lOO 


J0VIAL-X.2 


Form 


Description 






ko 


avar 


a) A tablename with- 
out subscripts represents the 
location of the table. This 
form is illegal in J3. 

b) A table item without sub- 
scripts represents the Oth 
entry, e. g., XX represents 
the XX ($0$) entry. This 
form is illegal in J3- 


A Table name without sub- 
scripts represents the lo- 
cation of the table. This 
form is illegal in J3. No 
dname or fixed. Integer 
only. 


kl 


avar: Subscript 


Same 


Same 


k2 


avar : BIT 


Same 


None 


43 


avar: CHAR, MANT 


None 


Npne 


kk 


avar: POS 


None 


None 


V> 


avar: NEWT 


Same 


None 


k6 


lvar 


Six characters or less 


Same as J2 


hi 


lvar : BYTE 


Same 


None 


kQ 


svar 


Same 


None 


h9 


bvar 


None 


None 


50 


bvar: ODD 


None 


None 


51 


entvar 


Uses ENT 


None 


52 


formula 


No bform 


No sform, bform 


53 


function 


No statement name as an out- 
put parameter 


Same as J2 


5^ 


aform 


No dcon 


No aeon, dcon 


55 


aform: NWDSEN 


Same 


None 
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J0VIAL-X.2 


Form 


Description 






56 


afonn 


ABS (aform) instead of 
(/ aform /). 


ABS (aform) instead of 
(/ aform /). Only floating 
point and integer computa- 
tions are performed. No 
modifiers 


57 


index 


Same 


Same 


58 


lform 


Six characters or less 


Six characters or less. No 
T. 


59 


sform 


Same 


None 


60 


bform 


None 


None 


61 


bform: aform 


Same 


Same except no multi-rela- 
tionals 


62 


bform: lform 


Same 


Same except no multi-rela- 
tionals 


63 


"bform: svar 


No filename 


None 


6U 


bform: entvar 


Same 


None 


65 


bform: AND, OR, NOT 


Same 


Same 


66 


entform 


Uses ENT 


None 


67 


seqform 


Same 


No item switches 


68 


statement : named 


Same 


Same 


69 


compound 


Same 


Same 


70 


ass ignment : avar 


Same 


Same 


71 


ass ignment : lvar 


Same 


Same 


72 


assignment : svar 


Same 


None 


73 


as s ignment : bvar 


None 4fc 


None 
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J0VIAL-X.2 


Form 


Description 






jl,. 


assignment : entvar 


Same 


None 


75 


== 


No BIT 


None 


16 


S3SB 


No BYTE 


None 


77 


S= 


Same 


None 


78 


BS 


None 


None 


79 


= = 


Same 


None 


80 


GOTO 


Same 


Same 


81 


IF 


No bvar 


Same as J2 


82 


FOE : 1 factor 


Same 


Same 


83 


FOR t 2 factor 


Same 


Same - *) The step factor may- 


8k 


FOR : 3 factor 


Same 


Same \ have a ne 8 ative sign. 

J but the expression 
being signed must be posi- 
tive. The subscript is 
decremented only if the 
step factor is preceded by 
the - sign. It is incre- 
mented if the sign is + or 
missing, i.e., 
FOR I - 10, -A, 1 $ 
A ftjay never have a negative 
value. 

FOR I - 10, B, 1 $ 
This statement will not 
work because I will be 
incremented by B. 

No Parallel FOR Statement. 


85 


FOR : ALL 


Same 


None 


86 


TEST 


Same 


Same 
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Form 



87 
88 

89 
90 

91 



92 



iT-T m-^/QQg/Ql 



93-96 

97 

98 

99 



Description 



CLOSE 

RETURN 

STOP 

Alternative 

Procedure 



DIRECT 



Input- Output 
Floating Item 
Fixed Item 

Dual Item 



,T-P (7090) m0L£223jl£Q 



Compound Statement only 
Same 

Same 

None 

a, No statement name as an 
output parameter. 
b« No table name as an out- 
put parameter. 

Same 



.TrfVTAT.-Y„g 



None 

No R or Range 

No R or Range, no negative 
precision 

None 



None 
Same 
No statement name 

None 

No statement name as an out 
put parameter 



Same. Notes Each compiler 
has different rules for 
handling direct code.* The 
J-X.2 Compiler treats the 
symbolic address as if it 
were an item name, e.g., 

CLA XYZ 
XYZ would be given the 
location of the item 
XYZ if it were in a ITEM 
declaration. If the direct 
code and the ITEM declara- 
tion were in a procedure, 
the location would be the 
same as the local variable. 

None 

No R or Range 

No fixed, only the integer 
form 

I n S;U 

None 



* See Appendix 
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J0VIAL-X.2 


Form 


Description 






100 


Literal Item 


Six characters or less 


No T. Six characters or 
less 


101 


Status Item 


Number of "bits is not option- 
al 


■ None 


102 


Boolean Item 


None 


None 


103 


Parameter 


Same 


No status or array parameter 


10U 


ITEM 


Same 


Same 


105 


Parameter ITEM 


The item may not be set, tha - 
is, used on the left side of 
an assignment statement or 
as an output parameter 


; The ITEM description must 
be present. The item may 
not be set, that is, used 
oh the left side of an 
assignment statement or as 
an output parameter. 


106 


MODE 


None 


None 


107 


OVERLAY 


None 


None 


108 


TABLE-Unspecified 


Same. Number of bits in STATU 5 None 
item may not he used. 


. 109 


TABLE- Specified 


Same. Number of bits in 
STATUS item is required 


No Strings. No Serial 
Entries. N, M or D must be 
given 


110 


Like 


No N, M, D 


None 


111 


ARRAY 


No parameters 


No parameters 


112 


SWITCH-numeric 


No SWITCH or CLOSE as branch 
point 


No SWITCH or CLOSE as branc 1 
point. No empty positions. 


113 


SWITCH- item 


No SWITCH or CLOSE or file- 
name as branch point 


None 


.114 


DEFINE 


None 


None 
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Form 



j-t iM-^/ooa/oi 



Description 



J-g (70Q0) T^^ft-fr^/mo 



rTOVTAT»-X,P 



115 
116 



FILE 
PBGC 



117 



Program 



None 

No tablename as a formal par- 
ameter. Since a table name 
can be used as an actual in- 



None 

No statement name as an out- 
put parameter. Since a 
table name can be used as a 



put parameter, its correspond -formal parameter, as in J3, 



ing formal parameter must be 
simple variable. This is 
illegal and unconsistent with 
the J3 form. No statement 
name as an output parameter 

Same 



this form is illegal in J2 



Same, except statement name 
must follow TERM 
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7090 DIEECT CODE LANGUAGE 



APPENDIX 



COLUMN 


1-6 


8-12 


11,12 


> 12 


> 30 








INDIRCT 










FIELD 


SYMBOL 


OPCODE 


AED 


ADDRESS . 


TAG, 


DECREMENT 


COMMENTS 




L) Label 


.)Mhemonic 


D* 


1) Label 


Integer 


Constant 






2) Blank 


fachine 
)perations 
2 ) BSS 

3) 0RG 
k) PZE 




2) Label + Constant 

3) =» Label 
k) Constant 

5) = Constant 

6) * 

7) * * 

8) * + Constant 

9) + Constant 

10) Blank 


Constant 


+ Constant 





NOTE: 1) 



Labels must be written in the form accepted by J-X.2. 
used in the J-X.2 coding, such as: 



They can be the same as labels 



P 



0) 
(0 



BLIST= 

DIRECT 

PSE 

STZ 

JOVIAL 



1 $ 
$ 
116 
BUST 



2) 



Constants must be written in the form accepted by J-X.2, such as: 

CAL =2H(AB) 



SUB 
STO 
CAL 
STW 



=0.3ZE-k 
1589 
=2J5(77) 
=XYZ+9 
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